home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue54 / Persist / cAdrs.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2000-01-21  |  701 b   |  27 lines
  1. {* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
  2.   (c) TechInsite Pty. Ltd.
  3.   PO Box 429, Abbotsford, Melbourne. 3067 Australia
  4.   Phone: +61 3 9419 6456
  5.   Fax:   +61 3 9419 1682
  6.   Web:   www.techinsite.com.au
  7.   EMail: peter_hinrichsen@techinsite.com.au
  8.  
  9.   Created: Jan 2000
  10.  
  11.   Notes: Constants used to identify famlies of visitors.
  12.  
  13. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *}
  14. unit cAdrs;
  15.  
  16. interface
  17. const
  18.   cgsAdrs_Read_PK     = 'Adrs_read_PK'     ;
  19.   cgsAdrs_Read_Detail = 'Adrs_read_Detail' ;
  20.   cgsAdrs_Update      = 'Adrs_Update'      ;
  21.  
  22.   cgsGetNextOIDHigh   = 'NextOIDHigh' ;
  23.   
  24. implementation
  25.  
  26. end.
  27.